home *** CD-ROM | disk | FTP | other *** search
/ IBM InfoROM for OS/2 Beta 1995 January / IBM InfoROM for OS2 Beta 1-1995.ISO / testcert / mmedia / system / ap2 / scripts / wp1____4.p2s < prev    next >
Encoding:
Text File  |  1994-05-09  |  1.4 KB  |  53 lines
  1. ###########################################################################
  2. # OBJECTIVE: WAVE FILE PLAY
  3. #
  4. # Description:  Open the digital audio player,
  5. #               load, cue, seek to the end, play, close.
  6. #
  7. ###########################################################################
  8. #
  9. ############################################
  10. #
  11. #   OPEN THE DIGITAL AUDIO PLAYER
  12. #   WAIT FOR SUCCESSFUL OPEN
  13. #
  14. ############################################
  15. #
  16. open waveaudio00 alias wave1 notify
  17. +MM_MCINOTIFY MCI_NOTIFY_SUCCESSFUL MCI_OPEN #1
  18. @WAIT_NOTIFY 1 45000
  19. acquire wave1
  20. @WAIT_PASSDEVICE wave1 60000
  21. #
  22. ############################################
  23. #
  24. #   LOAD AND CUE 8B11K.WAV FILE
  25. #   PLAY 8B22KS.WAV FILE AND EXPECT AN
  26. #   ABORT FROM A SEEK
  27. #
  28. ############################################
  29. #
  30. load wave1 ?AP2PATH?8B11K.WAV notify
  31. +MM_MCINOTIFY MCI_NOTIFY_SUCCESSFUL MCI_LOAD #2
  32. @WAIT_NOTIFY 2 30000
  33. cue wave1 output notify
  34. +MM_MCINOTIFY MCI_NOTIFY_SUCCESSFUL MCI_CUE #3
  35. @WAIT_NOTIFY 3 30000
  36.  
  37. seek wave1 to end wait
  38.  
  39. play wave1 notify
  40. +MM_MCINOTIFY MCI_NOTIFY_SUCCESSFUL MCI_PLAY #4
  41. @WAIT_NOTIFY 4 45000
  42. #
  43. ############################################
  44. #
  45. #   CLOSE THE DIGIAL AUDIO PLAYER AND
  46. #   EXPECT A SUCCESSFUL CLOSE
  47. #
  48. ############################################
  49. #
  50. close wave1 notify
  51. +MM_MCINOTIFY MCI_NOTIFY_SUCCESSFUL MCI_CLOSE #5
  52. @WAIT_NOTIFY 5 30000
  53.